From 7781a817ad3f15566a9ec32f83bbbea212391406 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Fri, 27 May 1994 09:11:50 +0000 Subject: [PATCH] (gnus-summary-catchup): Check gnus-interactive-catchup. (gnus-summary-catchup-and-exit): Likewise. --- lisp/gnus.el | 2 ++ 1 file changed, 2 insertions(+) diff --git a/lisp/gnus.el b/lisp/gnus.el index b7ad1d37903..e32eb67a36c 100644 --- a/lisp/gnus.el +++ b/lisp/gnus.el @@ -3940,6 +3940,7 @@ Optional argument FOLDER specifies folder name." If prefix argument ALL is non-nil, all articles are marked as read." (interactive "P") (if (or quietly + (not gnus-interactive-catchup) ;Without confirmation? (y-or-n-p (if all "Do you really want to mark everything as read? " @@ -3966,6 +3967,7 @@ If prefix argument ALL is non-nil, all articles are marked as read." If prefix argument ALL is non-nil, all articles are marked as read." (interactive "P") (if (or quietly + (not gnus-interactive-catchup) ;Without confirmation? (y-or-n-p (if all "Do you really want to mark everything as read? " -- 2.30.2